/********************************************************************************
do-file to replicate tables in:
	Chacon, Mario and Jeff Jensen. 2019. "Democratization, De Facto Power, and Taxation: 
	Evidence from Military Occupation during Reconstruction" World Politics 

data file needed: Dataset_1 (Main Panel) 
*/

clear all 
set more off

**Set Working Directory 
*cd "C:\****\ Replication Files (Chacon & Jensen, WP 2019)\Datasets\"

*** Online Appendix Table 3. Additional Controls ***
use Dataset_1, clear 

global ldc lnTotPop1860 i_lnTotPop1860_DORecon ///
lnFarValRPc1860 i_lnFarValRPc1860_DORecon ///
lnAgriGdpRPc1870 i_lnAgriGdpRPc1870_DORecon ///
lnManGdpRPc1870 i_lnManGdpRPc1870_DORecon 

*Additional controls & interactions 
global ldc1 m_cnt_recon i_m_cnt_recon_DORecon
global ldc2 ln_m_troops_recon i_ln_m_troops_recon_DORecon
global ldc3 yrs_occup_recon i_yrs_occup_recon_DORecon
global ldc4 lnPopDen1860 i_lnPopDen1860_DORecon 
global ldc5 lnDisStCap i_lnDisStCap_DORecon
global ldc6 dFarValPc7060 i_dFarValPc7060_DORecon 
global ldc7 cotton_sui i_cotton_sui_DORecon
global ldc8 landgini_1860 i_landgini_1860_DORecon
global ldc9 lnRRI1870 i_lnRRI1870_DORecon
    
** State Rev. 1860-1870
*c1-c9
reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc1 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast replace 

reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc2 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc3 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc4 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc5 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc6 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc7 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc8 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc9 st1-st16 if sample==1 & year==1870, r
outreg2 using Table_OA3.xls, ctitle("Table 3, St. Rev. 1860-70") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

** State Rev. 1870-1890 
*c10-c18
cls
reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc1 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_B.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast replace 

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc2 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_B.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc3 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_Bb.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc4 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_B.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc5 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_B.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc6 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_B.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc7 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_B.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc8 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_B.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_state_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc9 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_B.xls, ctitle("Table 3, St. Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

** County Rev. 1870-90
cls
reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc1 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast replace 

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc2 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc3 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc4 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc5 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc6 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc7 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc8 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

reg del2_ln_county_tax_real_pc i_black_sh_1860_DORecon black_sh_1860 d_occup_recon $ldc $ldc9 st1-st16 if sample==1 & year==1890, r
outreg2 using Table_OA3_C.xls, ctitle("Table 3, County Rev. 1870-90") keep(i_black_sh_1860_DORecon black_sh_1860 d_occup_recon) dec(3) noast

